string s[]; s1="abra";
path p[]; p1=(0,0)..(3,3); p2=(0,0)..(3,3)..cycle;
tracingonline:=1; scrollmode;
%forever: message "gimme an expr: "; s0:=readstring;
%showall maketokens s0; endfor
forever: message "gimme an expr: "; readterminal temp;
showall temp; endfor